(locate): Put point at first matching file rather than top of buffer.

diff --git a/lisp/locate.el b/lisp/locate.el
index 6d5967a57508c054fb440d81c864b71b173d20e5..12eb08a032653b88cca5c72ae6a6b2828d2a99f8 100644 (file)
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -240,6 +240,7 @@ With prefix arg, prompt for the locate command to run."
        (switch-to-buffer-other-window locate-buffer-name))
 
     (run-hooks 'dired-mode-hook)
+    (dired-next-line 2)                        ;move to first matching file.
     (run-hooks 'locate-post-command-hook)
     )
   )